home *** CD-ROM | disk | FTP | other *** search
/ Computer Life 1997 February / Computer Life February 1997.iso / TELME / COMMS / DIAL0029.SRP < prev    next >
Text File  |  1996-06-04  |  2KB  |  131 lines

  1. rem Copyright (c) PhoneLink plc 
  2. rem DialPlus (31/8/95)
  3.  
  4. label InitDevice
  5. echo off
  6. flush
  7. echo script[56]
  8. send "atchar(13)"
  9. timeout 3,modem_fail
  10. find "OK"
  11. label OffToGate  
  12. rem DialPlus Offline to Gate (also contains Pad to Gate)
  13. echo off
  14. flush
  15. echo script[57]
  16. send   "at{InitModemStr}char(13)"
  17. timeout 3,modem_fail
  18. find    "OK"
  19. echo script[52].
  20. send   "atd{DialMode}{PreTel}{Tel}{Postfix}char(13)"
  21. timeout {DialTimeout},connect_fail
  22. finderr 0,BUSY,busy
  23. finderr 103,NO DIALTONE,connect_fail
  24. finderr 103,NO DIAL TONE,connect fail
  25. finderr 0,NO CARRIER,no_carrier
  26. find    "CONNECT"
  27. timeout 10,pad_fail
  28. find    "char(5)"
  29. echo script[60]
  30. send    "{DPPassword}char(13)"
  31. timeout 5,pwd_fail
  32. finderr 0,password,pwd_fail
  33. find    "RETURN: "
  34. send    "{AccessPoint}char(13)"
  35. timeout 10,access_point_fail
  36. find    "PAD>"
  37. label PadToGate
  38. echo off
  39. echo script[53]
  40. send    "SER{SUB}char(13)"
  41. timeout 3,nua_bad1
  42. finderr 0,COM,nua_good
  43. find    "ZZZ"
  44. label nua_bad1
  45. echo script[58]
  46. send    "SER{SUB}char(13)"
  47. timeout 3,nua_bad2
  48. finderr 0,COM,nua_good
  49. find    "ZZZ"
  50. label nua_bad2
  51. echo script[58]
  52. send    "SER{SUB}char(13)"
  53. timeout 3,nua_fail
  54. find    "COM"
  55. label nua_good
  56. echo script[54].
  57. end
  58.  
  59. label GateToPad
  60. echo off
  61. echo script[92]
  62. send    "char(16)CLRchar(13)"
  63. timeout 5,ctrl_p_clear_fail
  64. find    "CONF"
  65. echo script[91].
  66. end
  67.  
  68. label GateToOff
  69. rem Gate to Offline (also contains Pad to Offline)
  70. label PadToOff
  71. echo off
  72. echo script[92]
  73. dtrlow
  74. wait 2
  75. dtrhigh
  76. echo script[99].
  77. end
  78.  
  79. label modem_offline
  80. echo script[92]
  81. dtrlow
  82. wait 2
  83. dtrhigh
  84. echo script[99]
  85. abort
  86.  
  87. label Term_Fail
  88. echo script[98]
  89. abort
  90.  
  91. label modem_fail
  92. echo script[23]
  93. goto modem_offline
  94.  
  95. label connect_fail
  96. echo script[1]
  97. goto modem_offline
  98.  
  99. label busy
  100. echo script[2]
  101. goto modem_offline
  102.  
  103. label no_carrier
  104. echo script[3]
  105. goto modem_offline
  106.  
  107. label pad_fail
  108. echo script[4]
  109. goto modem_offline
  110.  
  111. label pwd_fail
  112. echo script[19]
  113. goto modem_offline
  114.  
  115. label access_point_fail
  116. echo script[20]
  117. goto modem_offline
  118.  
  119. label nua_fail
  120. echo script[22]
  121. goto modem_offline
  122.  
  123. label ctrl_p_clear_fail
  124. echo script[14]
  125. goto modem_offline
  126.  
  127. label command_mode_fail
  128. echo script[15]
  129. goto modem_offline
  130.  
  131.